ominiincerhio2 alessia nirmala

per orocolo
ripeti 12 [lancetta destra 30]
fine

per lancetta
avanti 230
cerchio 50
indietro 230
aspetta :pausa
fine


per suono.wav.esegui :suono
se non cosa? "audio [audio.off]
se non :audio [stop]
suoni.attivi
as "suono.completo (parola :suono alfa.punto "wav)
verifica file.esiste :suono.completo
se_falso [stop]
mci.play1 :suono.completo
fine

per suono.rmi.esegui :suono
suoni.rmi.attivi
as "suono.completo (parola :suono alfa.punto "rmi)
verifica file.esiste :suono.completo
se_falso [stop]
mci.play1 :suono.completo
fine

per suono.rmi.accompagna :suono
suoni.rmi.attivi
as "suono.completo (parola :suono alfa.punto "rmi)
verifica file.esiste :suono.completo
se_falso [stop]
mci.play2 :suono.completo
fine

per suoni.rmi.attivi
disco.QQ
ccoc "QQ.iplozero.rmi
fine

per accompagna.con :musica
as "nome.completo (parola :musica ".wav)
suoni mci.play2 :nome.completo
fine

per suono.chiudi
mci.chiudi
fine

per rmi
ccoc :Percorso.Rmi
fine

per rmi.play :nome
rmi mci.play2 (parola :nome ".rmi)
fine

suono.chiudi
suono.rmi.accompagna "Mozart

tarta.apparecchia
sfondogrigio6
as "pausa 500
;suono.rmi.accompagna "gnomi
spessore 50 rosso1 orocolo
spessore 25 rosso3 orocolo
sfondogrigio5
spessore 50 verde1 orocolo
spessore 25 verde3 orocolo